<script>on mouseDownask "Enter client number:"if it = "" then exit mouseDownelseif it < 10 then put "000" into leaderelse if it < 100 then put "00" into leaderelse if it < 1000 then put "0" into leaderelse put "" into leaderput leader & (it+1-1) into fld "client#"end ifend mouseDown</script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>159</left>
<top>93</top>
<right>346</right>
<bottom>111</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Client Name</name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>159</left>
<top>114</top>
<right>248</right>
<bottom>132</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Phone</name>
<script></script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>314</left>
<top>262</top>
<right>394</right>
<bottom>308</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>10183</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Job</name>
<script>on mouseUpgo lastset the cursor to busyif the number of cards = 1 and fld 1 is empty thenput 0 into oldNumberput 0 into itelsedoMenu "New Card"global mat, mech, otherput 3 into fld "Mat"put 5 into fld "Mech"put 7 into fld "Other"put fld "mat" into matput fld "mech" into mechput fld "other" into otherget the number of this cardget fld "number" of cd it-1put it into oldNumberend ifif it < 10 then put "000" into leaderelse if it < 100 then put "00" into leaderelse if it < 1000 then put "0" into leaderelse put "" into leaderput oldNumber+1 into fld "number"put leader before fld "number"put the short date into fld "date"pasteInClientend mouseUp----------- PasteInClient -- pastes in client info on new cardon pasteInClientunlock screenglobal clientNameask "Enter New Client:"if it is "" thenlock screenput true into doDeletedoMenu "Delete card"go lastunlock screen with visual effect zoom closeexit pasteInClientend ifput it into clientNamepush cardgo stack "Client Stack"unlock screenrepeatfind clientName in fld "name"if the result is not empty thenput "Client not found:" into theAnsweranswer theAnswer with "Re-Find" or "Cancel" or "New"if it is "Re-Find" thenask "Enter Name:" with clientNameput it into clientNamenext repeatelse if it is "Cancel" thenlock screenpop cardput true into doDeletedoMenu "Delete card"go lastunlock screen with visual effect zoom closeexit pasteInClientend ifelseput "Use Client" && fld "Name" && "?" into theAnsweranswer theAnswer with "New" or "Use" or "Find Again"end ifif it is "New" thendoNewexit repeatelse if it is "Find Again" thengo nextnext repeatelse if it is "Use" thenexit repeatend ifend repeat-- get contactglobal theNameshow fld "backboard2"show fld "popUp2"if theName is empty then put " " into theNameend pasteInClient---------------- doNew for PasteInClient routineon doNewglobal clientNameask "Enter full client name:" with clientNameif it is "" thenlock screenpop cardput true into doDeletedoMenu "Delete card"go lastunlock screen with visual effect zoom closeexit to hyperCardend ifput it into clientNamelock screenif fld "client#" of card 1 <> 1 thenput "Sorting...please wait."sort by fld "client#"doMenu "Message"end ifgo lastif the number of cards = 1 and fld "name" = "" thenput "Entering first client into first card."elsedoMenu "New Card"end ifput "(-;Add Name;Delete Name" into fld "contacts"unlock screenput clientName into fld "Name"get the number of this cardif it < 10 then put "000" into leaderelse if it < 100 then put "00" into leaderelse if it < 1000 then put "0" into leaderelse put "" into leaderput leader & (it+1-1) into fld "client#"Ask "enter line 1 of address ( 3 lines total):"put it into line 1 of fld "address"Ask "enter line 2 of address:"put it into line 2 of fld "address"Ask "enter line 3 of address:"put it into line 3 of fld "address"ask "Enter telephone number:"put it into fld "phone"end doNew</script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>159</left>
<top>135</top>
<right>321</right>
<bottom>153</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Contact name</name>
<script>on mouseDownlock screenput "" into menuListget topleft of meput offset("Add Name",fld "contacts") - 4 into theLengthrepeat with x = 1 to theLengthput char x of fld "contacts" after menuListend repeatput ";(-;No Contact" after menuListget HpopUpMenu (MenuList,checkMark,item 2 of it,item 1 of it)if it is empty then exit mouseDownelse if item 1 of it is "No Contact" then put empty into meelse put item 1 of it into meend mouseDown</script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>378</left>
<top>55</top>
<right>467</right>
<bottom>73</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>date</name>
<script>on mousedownask "Enter new date:" with meif it is empty then exit mouseDownput it into meend mouseDown</script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>37</left>
<top>190</top>
<right>309</right>
<bottom>308</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Info</name>
<script></script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>142</left>
<top>328</top>
<right>189</right>
<bottom>358</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>902</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseUpif the shiftKey is down thenvisual effect iris open to whitego firstelsevisual effect wipe rightgo prevend ifend mouseUp</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>329</left>
<top>329</top>
<right>376</right>
<bottom>359</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>26425</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseUpif the shiftKey is down thenvisual effect iris open to blackgo lastelsevisual effect wipe leftgo nextend ifend mouseUp</script>
</part>
<part>
<id>18</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>412</left>
<top>262</top>
<right>467</right>
<bottom>308</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>17264</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Find...</name>
<script>on mouseUpAnswer "Find... (Command-. to cancel)" with "Job No." or "Client" or "Date"if it is "Job No." thenask "Enter Job No.:"if it = "" then exit mouseUpgo card itelse if it is "Client" thenanswer "Find Client..." with "By Name" or "By Number" or "Cancel"if it is "By Number" thenask "Enter Client No.:"if it = "" then exit mouseUpif it < 10 then put "000" into leaderelse if it < 100 then put "00" into leaderelse if it < 1000 then put "0" into leaderelse put "" into leaderput leader & (it+1-1) into itput it into findthislock screenput "find" && quote & findThis & quote && "in bg fld id 3"find it in bg fld "Client#"else if it is "By Name" thenask "Enter Client Name:"put it into findthislock screenput "find" && quote & findThis & quote && "in bg fld id 4"find it in bg fld "Client Name"end ifelse if it is "Date" thenask "Enter Date (format month/day/year):"if it = "" then exit mouseUpglobal findthisput it into findthislock screenput "find" && quote & findThis & quote && "in bg fld id 9"hide the message boxunlock screenfind chars findThis in bg fld id 9end ifend mouseUp</script>
</part>
<part>
<id>22</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>445</left>
<top>332</top>
<right>490</right>
<bottom>360</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>32670</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>show all cards</name>
<script>on mouseUpshow all cardsend mouseUp</script>
<script>on mouseWithinif the selectedField is not empty then exit mouseWithinget the scroll of last item of theFields()if it ≠ the scroll of first item of theFields() thenput the textHeight of last item of theFields() into baseLineSizelock screenrepeat with count = 1 to (number of items in theFields() - 1)set scroll of (item count of theFields()) to itend repeatunlock screenend ifend mouseWithin</script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>368</left>
<top>362</top>
<right>419</right>
<bottom>378</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>subtotal</name>
<script></script>
</part>
<part>
<id>40</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>368</left>
<top>377</top>
<right>419</right>
<bottom>393</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>sales tax</name>
<script></script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>368</left>
<top>392</top>
<right>419</right>
<bottom>408</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>please pay</name>
<script></script>
</part>
<part>
<id>44</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>282</left>
<top>362</top>
<right>369</right>
<bottom>378</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>subtotal find</name>
<script></script>
</part>
<part>
<id>45</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>282</left>
<top>377</top>
<right>369</right>
<bottom>393</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>sales tax find</name>
<script></script>
</part>
<part>
<id>46</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>282</left>
<top>392</top>
<right>369</right>
<bottom>408</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>please pay find</name>
<script></script>
</part>
<part>
<id>48</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>418</left>
<top>347</top>
<right>435</right>
<bottom>363</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>5656</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>dn</name>
<script>on mouseDownput the textHeight of item 1 of theFields() into baseLineSizeput the number of items in theFields() into numItemsrepeat until the mouse is upget (scroll of last item of theFields()) + baseLineSizelock screenrepeat with count = 1 to numItemsset scroll of (item count of theFields()) to itend repeatunlock screenend repeatend mouseDown</script>
</part>
<part>
<id>49</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>438</left>
<top>120</top>
<right>497</right>
<bottom>169</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29999</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>labor</name>
<script>on mouseUpglobal mat, mech, other, LaborPriceif line 2 of fld "description" is empty thenask "How many hours?"if it is empty then exit mouseUpset the numberFormat to 0.00put it*1 into LaborHoursask "At How Much Per Hour?" with "15.00"put it*1 into LaborPriceput " "&& LaborHours && "hours @" && LaborPrice && "per hour" & return into line 2 of fld "description"put LaborHours * LaborPrice & return into line 2 of bg fld id 38put Mat +1 into Matput Mech +1 into Mechput Other +1 into Otherelseask "How many more hours?"set the numberFormat to 0.00put it + (word 1 of line 2 of fld "description")*1 into extraput " "&& extra && "hours @" && LaborPrice && "per hour" into line 2 of fld "description"put extra * LaborPrice into line 2 of bg fld id 38end ifsubTotaltotalend mouseUp</script>
</part>
<part>
<id>50</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>438</left>
<top>171</top>
<right>497</right>
<bottom>219</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29998</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>materials</name>
<script>on mouseUpglobal mat, mech, other, LaborPriceask "Item Name"if it is empty then exit mouseUpput it into ItemNameset the numberFormat to 0.00ask "How Many Units of" && ItemNameput it into ItemQuantityask "How Much Does A Unit Of" && ItemName && "Cost?"put it*1 into ItemPriceput " " && ItemQuantity && ItemName && "@" && ItemPrice && "per unit" & return into line (Mat+1) of bg fld "description"put ItemQuantity * ItemPrice & return into line (Mat+1) of bg fld id 38put Mat +1 into Matput Mech +1 into Mechput Other +1 into OthersubTotaltotalend mouseUp</script>
</part>
<part>
<id>51</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>438</left>
<top>221</top>
<right>498</right>
<bottom>267</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29997</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>plain</textStyle>
<name>mechanicals</name>
<script>on mouseUpglobal showInvoice, Mat, Mech, Otherask "Item Name"if it is empty then exit mouseUpput it into ItemNameset the numberFormat to 0.00ask "How Many Units of" && ItemNameput it into ItemQuantityask "How Much Does A Unit Of" && ItemName && "Cost?"put it*1 into ItemPriceput " " && ItemQuantity && ItemName && "@" && ItemPrice && "per unit" & return into line (Mech+1) of bg fld "description"put ItemQuantity * ItemPrice & return into line (Mech+1) of bg fld id 38put Mech +1 into Mechput Other +1 into OthersubTotaltotalend mouseUp</script>
</part>
<part>
<id>52</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>438</left>
<top>269</top>
<right>498</right>
<bottom>318</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29996</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>other</name>
<script>on mouseUpglobal showInvoice, Mat, Mech, Otherask "Item Name"if it is empty then exit mouseUpput it into ItemNameset the numberFormat to 0.00ask "How Many Units of" && ItemNameput it into ItemQuantityask "How Much Does A Unit Of" && ItemName && "Cost?"put it*1 into ItemPriceput " " && ItemQuantity && ItemName && "@" && ItemPrice && "per unit" & return into line (Other+1) of bg fld "description"put ItemQuantity * ItemPrice & return into line (Other+1) of bg fld id 38put Other +1 into OthersubTotaltotalend mouseUp</script>
</part>
<part>
<id>53</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>23</left>
<top>10</top>
<right>138</right>
<bottom>33</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Show Billing</name>
<script>on mouseUplock screenglobal showInvoice, Mater, Mechs, Other--------------show invoiceshow bg btn id 49show bg btn id 50show bg btn id 51show bg btn id 52show bg btn id 56show bg btn id 57show bg btn id 58show bg btn id 59show bg btn id 64show bg btn id 48show bg btn id 60show bg btn id 68show fld id 34show fld id 37show fld id 38show fld id 44show fld id 45show fld id 46show fld id 39show fld id 40show fld id 42if fld "description" is empty thenput "Labor:" & return & return &¬"Materials:" & return & return &¬"Mechanicals:" & return & return &¬"Other:" into fld "description"put 3 into Materput 5 into Mechsput 7 into Otherend ifput true into showInvoicehide meshow bg btn "hide Billing"unlock screen with visual effect zoom outend mouseUp</script>
</part>
<part>
<id>56</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>438</left>
<top>320</top>
<right>499</right>
<bottom>364</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>27774</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Clear Invoice</name>
<script>on mouseUpglobal mat, mech, otheranswer "OK to clear out invoice?" with "OK" or "Cancel"if it is "OK" thenrepeat with x = 11 to 16put "" into fld xend repeatput "Labor:" & return & return &¬"Materials:" & return & return &¬"Mechanicals:" & return & return &¬"Other:" into fld "description"put 3 into Matput 5 into Mechput 7 into Otherend ifend mouseUp</script>
</part>
<part>
<id>57</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>312</left>
<top>362</top>
<right>419</right>
<bottom>378</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>find subtotal</name>
<script>on mouseUpsubtotalend mouseUp</script>
</part>
<part>
<id>58</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>312</left>
<top>377</top>
<right>419</right>
<bottom>393</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>get tax</name>
<script>on mouseUpask "Sales Tax Rate (ex. 5.7)"put it / 100 into taxset the numberFormat to 0.00put tax * fld "subtotal" into fld "sales tax"totalend mouseUp</script>
</part>
<part>
<id>59</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>300</left>
<top>392</top>
<right>419</right>
<bottom>408</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseUptotalend mouseUp</script>
</part>
<part>
<id>60</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>418</left>
<top>120</top>
<right>435</right>
<bottom>136</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>5655</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>up</name>
<script>on mouseDownput the textHeight of item 1 of theFields() into baseLineSizeput the number of items in theFields() into numItemsrepeat until the mouse is upget (scroll of last item of theFields()) - baseLineSizelock screenrepeat with count = 1 to numItemsset scroll of (item count of theFields()) to itend repeatunlock screenend repeatend mouseDown</script>
</part>
<part>
<id>61</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>8</left>
<top>337</top>
<right>25</right>
<bottom>352</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>address</name>
<script></script>
</part>
<part>
<id>63</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>82</left>
<top>370</top>
<right>282</right>
<bottom>417</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Helvetica</font>
<textSize>40</textSize>
<textStyle>bold</textStyle>
<textHeight>53</textHeight>
<name>paid</name>
<script></script>
</part>
<part>
<id>64</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>439</left>
<top>368</top>
<right>499</right>
<bottom>415</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29995</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Mark as Paid</name>
<script>on mouseUpif bg fld "paid"is empty then put "PAID" into bg fld "paid"elseanswer "Remove PAID status from Invoice?" with "OK" or "Cancel"if it is "cancel" then exit mouseUpelse put empty into bg fld "paid"end ifend mouseUp</script>
</part>
<part>
<id>65</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>159</left>
<top>151</top>
<right>405</right>
<bottom>191</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>contacts</name>
<script></script>
</part>
<part>
<id>66</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>23</left>
<top>10</top>
<right>138</right>
<bottom>33</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Hide Billing</name>
<script>on mouseUplock screenglobal showInvoice, Mater, Mechs, Other--------------hide invoicehide bg btn id 49hide bg btn id 50hide bg btn id 51hide bg btn id 52hide bg btn id 56hide bg btn id 57hide bg btn id 58hide bg btn id 59hide bg btn id 64hide bg btn id 48hide bg btn id 60hide bg btn id 68hide fld id 34hide fld id 37hide fld id 38hide fld id 44hide fld id 45hide fld id 46hide fld id 39hide fld id 40hide fld id 42put mat into fld "mat"put mech into fld "mech"put other into fld "other"hide meshow bg btn "Show Billing"unlock screen with visual effect zoom inend mouseUp</script>
</part>
<part>
<id>67</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>23</left>
<top>10</top>
<right>138</right>
<bottom>33</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Billing</name>
<script>on mouseUplock screen--------------hide invoicehide bg btn id 49hide bg btn id 50hide bg btn id 51hide bg btn id 52hide bg btn id 56hide bg btn id 57hide bg btn id 58hide bg btn id 59hide bg btn id 64hide bg btn id 48hide bg btn id 60hide bg btn id 68hide fld id 34hide fld id 37hide fld id 38hide fld id 44hide fld id 45hide fld id 46hide fld id 39hide fld id 40hide fld id 42if fld "description" is empty thenput "Labor:" & return & return &¬"Materials:" & return & return &¬"Mechanicals:" & return & return &¬"Other:" into fld "description"put 3 into Materput 5 into Mechsput 7 into Otherend ifunlock screen with visual effect zoom inend mouseUp</script>
</part>
<part>
<id>68</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>16</left>
<top>368</top>
<right>76</right>
<bottom>415</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1008</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Print invoice</name>
<script>on mouseUpunmark all cardssubtotaltotalanswer "Print Invoices:" with "This Job" or "All" or "Cancel"if it is "This Job" thenopen report printing with template "Invoice"print this cardclose printingelse if it is "All" thenanswer "Print invoices for all jobs:" with "Receivable" or "Received" or "Both"if it is "Receivable" thenput "got here"mark cards where fld "paid" is emptyopen report printing with template "Invoice"print marked cardsclose printingelse if it is "Received" thenmark cards where fld "paid" = "PAID"open report printing with template "Invoice"print marked cardsclose printingelse if it = "Both" thenopen report printing with template "Invoice"print all cardsclose printingend ifend ifend mouseUp</script>
</part>
<part>
<id>72</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>442</left>
<top>142</top>
<right>497</right>
<bottom>157</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>mat</name>
<script></script>
</part>
<part>
<id>73</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>442</left>
<top>164</top>
<right>497</right>
<bottom>179</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>mech</name>
<script></script>
</part>
<part>
<id>74</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>442</left>
<top>187</top>
<right>497</right>
<bottom>202</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>other</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>45</id>
<text>sales tax:</text>
</content>
<content>
<layer>background</layer>
<id>46</id>
<text>please pay:</text>
</content>
<content>
<layer>background</layer>
<id>65</id>
<text>jhggh;(-;Add Name;Delete Name</text>
</content>
<content>
<layer>background</layer>
<id>31</id>
<text><span class="style1"> FreeLancer</span><span class="style2"> By Jeff AbreschFreeLancer </span><span class="style3">is a job management tool written for the graphic arts service industry, particularly desktop publishers and graphic artists working out of their homes.</span><span class="style4">What it does.</span><span class="style5">FreeLancer simultaneously keeps track of clients and individual jobs, allowing for archival and easy retrival of job and client history. In addition, it creates and archives invoices for each job.</span><span class="style4">How it works.</span><span class="style5">To begin using FreeLancer, click on the "new job" button. FreeLancer asks for the client or company name and searches for it in the client stack. You need not enter the full name--this is only a search string, and if the client is already in the client stack, the full name will automaatically be used. If it is not found, you may create a new invoice, at which point FreeLancer will ask you to re-enter the full client name.If the client is new, you are prompted to enter the address, phone number, and contact for that client. When the Contact prompt appears, use the pop-up menu to choose a new or existing contact. Once this is done, freeLancer will paste all relevant information into the new job you have created. If the client already exists, you will be asked to choose a contact via a pop up menu. Choose either a new contact, an existing one, or No Contact. FreeLancer will then paste this information into the new job.</span><span class="style4">Editing jobs and clients</span><span class="style5">At any time, you may edit the job information of any job, or any of the information for a client. Use the "Find" button to locate jobs and/or clients.IMPORTANT: NEVER delete a client or job card. The job stack finds jobs by job number, which MUST correspond to the card number. Deleting a card or sorting the stack by something other than the job number will screw this up.If one of your clients goes out of business or becomes an ex-client, put a question mark in place of the Client/Company name. The next time you create a new client, that client will be replaced. Again, do not delete the card for that client to avoid messing up the numbering system.</span><span class="style4">Invoicing</span><span class="style5">To create an invoice, simply press the "show billing" button on the job stack. Then press the category buttons on the right to fill out the invoice. When payment is received for that invoice, press the "PAID" button.</span><span class="style6">Printing the invoice</span><span class="style5">Once the invoice is created, press the "Print Invoice" button. You are given a choice of printing an invoice for this job or all jobs. If you choose all jobs, you have a choice of printing "Received" invoices (those for which payment has been received), "Receivable" (waiting for payment) invoices, or both.I hope you enjoy using FreeLancer. If you do, please send a $20.00 shareWare fee to the address below. I will keep you in touch with updates and offer additional support. Jeff Abresch2324 19th StreetBoulder, CO 80304America Online: Flatirons</span></text>
</content>
<name></name>
<script>-------- Invoice scriptson subTotalput 0 into subtotalget the number of lines in fld "description price"repeat with x = 1 to itput subtotal + line x of fld "description price" into subtotalend repeatset the numberFormat to 0.00put subtotal*1 into field "subtotal"end subtotalon totalset the numberFormat to 0.00if fld "sales tax" is empty then put "0.00" into fld "sales tax"put (fld "subtotal" + fld "sales tax") *1 into field "please pay"end totalfunction theFieldsreturn "bg fld id 37, bg fld id 38"end theFields</script>
(CDRM1080320)(1993).iso/FILES/DTP/A-F/FreeLancer1.1.cpt/FreeLancer 1.1/Job stack/BMAP_4390.png){kind=link}